Dim WshShell
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run "cmd.exe"
WScript.Sleep 1500
WshShell.SendKeys "git pull"
WshShell.SendKeys "{ENTER}"
WScript.Sleep 1000
WshShell.SendKeys "git add ."
WshShell.SendKeys "{ENTER}"
WScript.Sleep 1000
WshShell.SendKeys "git commit -m 'commit-code-idea' "
WshShell.SendKeys "{ENTER}"
WScript.Sleep 1000
WshShell.SendKeys "git push "
WshShell.SendKeys "{ENTER}"
WScript.Sleep 1500
rem WshShell.SendKeys "exit"
rem WScript.Sleep 1000
rem WshShell.SendKeys "{ENTER}"
